object F_Boletos: TF_Boletos
  Left = 461
  Top = 150
  Width = 537
  Height = 364
  BorderIcons = [biSystemMenu]
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object MMJPanel3: TMMJPanel
    Left = 0
    Top = 59
    Width = 521
    Height = 205
    Align = alTop
    BevelInner = bvLowered
    TabOrder = 0
    Silhuette.Shape.ShapeText = 'Shape text'
    Silhuette.PictureShape.Picture.Data = {07544269746D617000000000}
    Silhuette.PictureShape.DisplayPicture = True
    Background.StartColor = clSilver
    Background.EndColor = clSkyBlue
    Background.FillType = GradUpDown
    object lbl1: TLabel
      Left = 5
      Top = 6
      Width = 34
      Height = 13
      Caption = 'Banco:'
      Transparent = True
    end
    object lbl2: TLabel
      Left = 151
      Top = 6
      Width = 35
      Height = 13
      Caption = 'Layout:'
      Transparent = True
    end
    object lbl3: TLabel
      Left = 227
      Top = 6
      Width = 82
      Height = 13
      Caption = 'Layout Remessa:'
      Transparent = True
    end
    object lbl4: TLabel
      Left = 311
      Top = 6
      Width = 130
      Height = 13
      Caption = 'Respons'#225'vel pela Emiss'#227'o:'
      Transparent = True
    end
    object lbl6: TLabel
      Left = 5
      Top = 102
      Width = 171
      Height = 13
      Caption = 'Pasta destino do Arquivo Remessa :'
      Transparent = True
    end
    object lbl7: TLabel
      Left = 8
      Top = 59
      Width = 164
      Height = 13
      Caption = 'Pasta contento Logo dos Bancos :'
      Transparent = True
    end
    object lbl10: TLabel
      Left = 5
      Top = 146
      Width = 165
      Height = 13
      Caption = 'Pasta destino do Arquivo Retorno :'
      Transparent = True
    end
    object lbl8: TLabel
      Left = 443
      Top = 6
      Width = 63
      Height = 13
      Caption = 'Comprovante'
      Transparent = True
    end
    object Label1: TLabel
      Left = 341
      Top = 102
      Width = 82
      Height = 13
      Caption = 'Nome do Arquivo'
      Transparent = True
    end
    object cbb1: TComboBox
      Left = 5
      Top = 22
      Width = 145
      Height = 21
      BevelKind = bkFlat
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 2
      TabOrder = 0
      Text = '237 - Banco Bradesco'
      Items.Strings = (
        '001 - Banco do Brasil'
        '104 - Caixa Economica'
        '237 - Banco Bradesco'
        '275 - Banco Real'
        '341 - Banco Itau'
        '399 - Banco HSBC'
        '409 - Banco Unicanco'
        '748 - Banco Sicredi'
        '353 - Banco Santander'
        '')
    end
    object cbb2: TComboBox
      Left = 151
      Top = 22
      Width = 75
      Height = 21
      BevelKind = bkFlat
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 1
      Text = 'Boleto'
      Items.Strings = (
        'Boleto'
        'Carn'#234
        'Fatura')
    end
    object cbb3: TComboBox
      Left = 227
      Top = 22
      Width = 83
      Height = 21
      BevelKind = bkFlat
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 2
      Text = 'c400'
      Items.Strings = (
        'c400'
        'c240')
    end
    object cbb4: TComboBox
      Left = 311
      Top = 22
      Width = 131
      Height = 21
      BevelKind = bkFlat
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 1
      TabOrder = 3
      Text = 'Cliente Emite'
      Items.Strings = (
        'Banco Emite'
        'Cliente Emite')
    end
    object edt1: TEdit
      Left = 5
      Top = 115
      Width = 305
      Height = 21
      BevelKind = bkFlat
      BorderStyle = bsNone
      TabOrder = 4
      Text = 'C:\Home\imob_2011\Remessa\'
    end
    object btn1: TBitBtn
      Left = 311
      Top = 112
      Width = 29
      Height = 25
      Caption = '...'
      TabOrder = 5
      OnClick = btn1Click
    end
    object edt2: TEdit
      Left = 6
      Top = 72
      Width = 479
      Height = 21
      BevelKind = bkFlat
      BorderStyle = bsNone
      TabOrder = 6
      Text = 'C:\Home\imob_2011\LogoBanco'
    end
    object edt3: TEdit
      Left = 5
      Top = 159
      Width = 480
      Height = 21
      BevelKind = bkFlat
      BorderStyle = bsNone
      TabOrder = 7
      Text = 'C:\Home\Retorno\'
    end
    object btn5: TBitBtn
      Left = 486
      Top = 155
      Width = 29
      Height = 25
      Caption = '...'
      TabOrder = 8
    end
    object btn6: TBitBtn
      Left = 486
      Top = 69
      Width = 29
      Height = 25
      Caption = '...'
      TabOrder = 9
    end
    object cbb5: TComboBox
      Left = 443
      Top = 22
      Width = 71
      Height = 21
      BevelKind = bkFlat
      Style = csDropDownList
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 10
      Text = 'SIM'
      Items.Strings = (
        'SIM'
        'N'#195'O')
    end
    object pnl2: TMMJPanel
      Left = 78
      Top = 2
      Width = 366
      Height = 73
      TabOrder = 11
      Visible = False
      Silhuette.Shape.ShapeText = 'Shape text'
      Silhuette.PictureShape.Picture.Data = {07544269746D617000000000}
      Silhuette.PictureShape.DisplayPicture = True
      Background.StartColor = clSilver
      Background.EndColor = clGreen
      Background.FillType = GradUpDown
      object RxLabel2: TRxLabel
        Left = 1
        Top = 1
        Width = 364
        Height = 46
        Align = alClient
        Alignment = taCenter
        Caption = ' Aguarde ...Gerando Boletos'
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -24
        Font.Name = 'Times New Roman'
        Font.Style = [fsBold]
        Layout = tlCenter
        ParentFont = False
        ShadowPos = spRightBottom
        Transparent = True
      end
      object FlatGauge1: TFlatGauge
        Left = 1
        Top = 47
        Width = 364
        Height = 25
        AdvColorBorder = 0
        ColorBorder = 8623776
        Progress = 0
        Align = alBottom
      end
    end
    object Edit1: TEdit
      Left = 341
      Top = 115
      Width = 174
      Height = 21
      BevelKind = bkFlat
      BorderStyle = bsNone
      TabOrder = 12
      Text = 'CB'
    end
  end
  object MMJPanel1: TMMJPanel
    Left = 0
    Top = 0
    Width = 521
    Height = 59
    Align = alTop
    BevelInner = bvLowered
    TabOrder = 1
    Silhuette.Shape.ShapeText = 'Shape text'
    Silhuette.PictureShape.Picture.Data = {07544269746D617000000000}
    Silhuette.PictureShape.DisplayPicture = True
    Background.StartColor = clSilver
    Background.EndColor = clSkyBlue
    Background.FillType = GradUpDown
    object lbl5: TLabel
      Left = 2
      Top = 2
      Width = 517
      Height = 55
      Align = alClient
      Alignment = taCenter
      Caption = 'Gerar Boletos / Remessas'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -24
      Font.Name = 'Modern No. 20'
      Font.Style = [fsItalic]
      ParentFont = False
      Transparent = True
      Layout = tlCenter
    end
  end
  object MMJPanel2: TMMJPanel
    Left = 0
    Top = 264
    Width = 521
    Height = 59
    Align = alTop
    BevelInner = bvLowered
    TabOrder = 2
    Silhuette.Shape.ShapeText = 'Shape text'
    Silhuette.PictureShape.Picture.Data = {07544269746D617000000000}
    Silhuette.PictureShape.DisplayPicture = True
    Background.StartColor = clSilver
    Background.EndColor = clSkyBlue
    Background.FillType = GradUpDown
    object btn2: TBitBtn
      Left = 96
      Top = 14
      Width = 103
      Height = 31
      Caption = 'IMPRIMIR'
      TabOrder = 0
      OnClick = btn2Click
    end
    object btn3: TBitBtn
      Left = 207
      Top = 14
      Width = 103
      Height = 31
      Caption = 'GERAR REMESSA'
      TabOrder = 1
      OnClick = btn3Click
    end
    object btn4: TBitBtn
      Left = 318
      Top = 14
      Width = 103
      Height = 31
      Caption = 'SAIR'
      TabOrder = 2
      OnClick = btn4Click
    end
  end
  object ACBrBoleto1: TACBrBoleto
    Cedente.TipoInscricao = pOutras
    Banco.Numero = 237
    Banco.TamanhoMaximoNossoNum = 11
    Banco.TipoCobranca = cobBradesco
    NumeroArquivo = 0
    ComprovanteEntrega = True
    ACBrBoletoFC = ACBrBoletoFCFortes1
    Left = 408
    Top = 8
  end
  object ACBrBoletoFCFortes1: TACBrBoletoFCFortes
    ACBrBoleto = ACBrBoleto1
    Left = 440
    Top = 8
  end
  object s_banco: TSQLDataSet
    CommandText = 
      'SELECT a.CODBANCO, a.BANCO, a.NOMEBANCO, a.CARTEIRA, a.CODIGO_CE' +
      'DENTE, a.CODIGO_EMPRESA, a.CODIGO_AGENCIA, a.DIGITO_AGENCIA, '#13#10'a' +
      '.NUMERO_CONTA, a.DIGITO_CONTA, a.CODIGO_PLANO, a.INSTRUCAO1, a.I' +
      'NSTRUCAO2, a.INSTRUCAO3, a.INSTRUCAO4, a.CEDENTE, a.NCONVENIO, '#13 +
      #10'a.ESPECIEDOC, a.ACEITE, a.CONVENIO, a.LOCALPGTO , a.NUMEROBOLET' +
      'O'#13#10'FROM BANCO a'#13#10'where CODBANCO = :bc'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftInteger
        Name = 'bc'
        ParamType = ptInput
      end>
    SQLConnection = DM.scSge
    Left = 272
    Top = 123
    object s_bancoCODBANCO: TSmallintField
      FieldName = 'CODBANCO'
      Required = True
    end
    object s_bancoBANCO: TStringField
      FieldName = 'BANCO'
      Required = True
      Size = 18
    end
    object s_bancoNOMEBANCO: TStringField
      FieldName = 'NOMEBANCO'
      Required = True
      Size = 30
    end
    object s_bancoCARTEIRA: TStringField
      FieldName = 'CARTEIRA'
      FixedChar = True
      Size = 3
    end
    object s_bancoCODIGO_CEDENTE: TStringField
      FieldName = 'CODIGO_CEDENTE'
      Size = 10
    end
    object s_bancoCODIGO_EMPRESA: TStringField
      FieldName = 'CODIGO_EMPRESA'
      Size = 10
    end
    object s_bancoCODIGO_AGENCIA: TStringField
      FieldName = 'CODIGO_AGENCIA'
      Size = 10
    end
    object s_bancoDIGITO_AGENCIA: TStringField
      FieldName = 'DIGITO_AGENCIA'
      FixedChar = True
      Size = 1
    end
    object s_bancoNUMERO_CONTA: TStringField
      FieldName = 'NUMERO_CONTA'
      Size = 10
    end
    object s_bancoDIGITO_CONTA: TStringField
      FieldName = 'DIGITO_CONTA'
      FixedChar = True
      Size = 1
    end
    object s_bancoCODIGO_PLANO: TIntegerField
      FieldName = 'CODIGO_PLANO'
    end
    object s_bancoINSTRUCAO1: TStringField
      FieldName = 'INSTRUCAO1'
      Size = 100
    end
    object s_bancoINSTRUCAO2: TStringField
      FieldName = 'INSTRUCAO2'
      Size = 100
    end
    object s_bancoINSTRUCAO3: TStringField
      FieldName = 'INSTRUCAO3'
      Size = 100
    end
    object s_bancoINSTRUCAO4: TStringField
      FieldName = 'INSTRUCAO4'
      Size = 100
    end
    object s_bancoCEDENTE: TStringField
      FieldName = 'CEDENTE'
      Size = 100
    end
    object s_bancoNCONVENIO: TIntegerField
      FieldName = 'NCONVENIO'
    end
    object s_bancoESPECIEDOC: TStringField
      FieldName = 'ESPECIEDOC'
      Size = 5
    end
    object s_bancoACEITE: TStringField
      FieldName = 'ACEITE'
      Size = 2
    end
    object s_bancoCONVENIO: TStringField
      FieldName = 'CONVENIO'
      Size = 10
    end
    object s_bancoLOCALPGTO: TStringField
      FieldName = 'LOCALPGTO'
      Size = 100
    end
    object s_bancoNUMEROBOLETO: TStringField
      FieldName = 'NUMEROBOLETO'
    end
  end
  object s_cr: TSQLDataSet
    CommandText = 
      'select * from RECEBIMENTO '#13#10'where CODVENDA = :id_venda'#13#10'       o' +
      'r DP = :dp'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftInteger
        Name = 'id_venda'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'dp'
        ParamType = ptInput
      end>
    Left = 240
    Top = 179
    object s_crCODRECEBIMENTO: TIntegerField
      FieldName = 'CODRECEBIMENTO'
      Required = True
    end
    object s_crTITULO: TStringField
      FieldName = 'TITULO'
      Required = True
      Size = 18
    end
    object s_crEMISSAO: TDateField
      FieldName = 'EMISSAO'
    end
    object s_crCODCLIENTE: TIntegerField
      FieldName = 'CODCLIENTE'
      Required = True
    end
    object s_crDATAVENCIMENTO: TDateField
      FieldName = 'DATAVENCIMENTO'
    end
    object s_crDATARECEBIMENTO: TDateField
      FieldName = 'DATARECEBIMENTO'
    end
    object s_crCAIXA: TSmallintField
      FieldName = 'CAIXA'
    end
    object s_crCONTADEBITO: TIntegerField
      FieldName = 'CONTADEBITO'
    end
    object s_crCONTACREDITO: TIntegerField
      FieldName = 'CONTACREDITO'
    end
    object s_crSTATUS: TStringField
      FieldName = 'STATUS'
      Required = True
      FixedChar = True
      Size = 2
    end
    object s_crVIA: TStringField
      FieldName = 'VIA'
      Required = True
      FixedChar = True
      Size = 4
    end
    object s_crFORMARECEBIMENTO: TStringField
      FieldName = 'FORMARECEBIMENTO'
      Required = True
      FixedChar = True
      Size = 1
    end
    object s_crDATABAIXA: TDateField
      FieldName = 'DATABAIXA'
    end
    object s_crHISTORICO: TStringField
      FieldName = 'HISTORICO'
      Size = 150
    end
    object s_crCODVENDA: TIntegerField
      FieldName = 'CODVENDA'
    end
    object s_crCODALMOXARIFADO: TSmallintField
      FieldName = 'CODALMOXARIFADO'
    end
    object s_crCODVENDEDOR: TSmallintField
      FieldName = 'CODVENDEDOR'
    end
    object s_crCODUSUARIO: TSmallintField
      FieldName = 'CODUSUARIO'
    end
    object s_crN_DOCUMENTO: TStringField
      FieldName = 'N_DOCUMENTO'
    end
    object s_crDATASISTEMA: TSQLTimeStampField
      FieldName = 'DATASISTEMA'
    end
    object s_crVALORRECEBIDO: TFloatField
      FieldName = 'VALORRECEBIDO'
    end
    object s_crJUROS: TFloatField
      FieldName = 'JUROS'
    end
    object s_crDESCONTO: TFloatField
      FieldName = 'DESCONTO'
    end
    object s_crPERDA: TFloatField
      FieldName = 'PERDA'
    end
    object s_crTROCA: TFloatField
      FieldName = 'TROCA'
    end
    object s_crFUNRURAL: TFloatField
      FieldName = 'FUNRURAL'
    end
    object s_crVALOR_PRIM_VIA: TFloatField
      FieldName = 'VALOR_PRIM_VIA'
    end
    object s_crVALOR_RESTO: TFloatField
      FieldName = 'VALOR_RESTO'
    end
    object s_crVALORTITULO: TFloatField
      FieldName = 'VALORTITULO'
    end
    object s_crOUTRO_CREDITO: TFloatField
      FieldName = 'OUTRO_CREDITO'
    end
    object s_crOUTRO_DEBITO: TFloatField
      FieldName = 'OUTRO_DEBITO'
    end
    object s_crPARCELAS: TIntegerField
      FieldName = 'PARCELAS'
    end
    object s_crDUP_REC_NF: TStringField
      FieldName = 'DUP_REC_NF'
      Size = 15
    end
    object s_crNF: TIntegerField
      FieldName = 'NF'
    end
    object s_crDP: TIntegerField
      FieldName = 'DP'
    end
    object s_crBL: TIntegerField
      FieldName = 'BL'
    end
    object s_crCODORIGEM: TIntegerField
      FieldName = 'CODORIGEM'
    end
    object s_crCODIGO_DE_BARRAS: TStringField
      FieldName = 'CODIGO_DE_BARRAS'
      Size = 54
    end
    object s_crIMAGE_COD_BARRAS: TGraphicField
      FieldName = 'IMAGE_COD_BARRAS'
      BlobType = ftGraphic
    end
    object s_crDV: TStringField
      FieldName = 'DV'
      FixedChar = True
      Size = 2
    end
    object s_crNOMEARQUIVORETORNO: TStringField
      FieldName = 'NOMEARQUIVORETORNO'
      Size = 80
    end
    object s_crDATACONSOLIDA: TDateField
      FieldName = 'DATACONSOLIDA'
    end
    object s_crSELECIONOU: TStringField
      FieldName = 'SELECIONOU'
      FixedChar = True
      Size = 1
    end
    object s_crDESCONTADO: TStringField
      FieldName = 'DESCONTADO'
      FixedChar = True
      Size = 1
    end
    object s_crSITUACAO: TStringField
      FieldName = 'SITUACAO'
      FixedChar = True
      Size = 1
    end
    object s_crCONTA: TStringField
      FieldName = 'CONTA'
      FixedChar = True
      Size = 10
    end
    object s_crBANCO: TStringField
      FieldName = 'BANCO'
      Size = 60
    end
    object s_crAGENCIA: TStringField
      FieldName = 'AGENCIA'
      Size = 10
    end
    object s_crGERARQREM: TIntegerField
      FieldName = 'GERARQREM'
    end
    object s_crDATAGERARQREM: TDateField
      FieldName = 'DATAGERARQREM'
    end
    object s_crSITUACAOCHEQUE: TStringField
      FieldName = 'SITUACAOCHEQUE'
      Size = 15
    end
    object s_crVALST: TFloatField
      FieldName = 'VALST'
    end
    object s_crVALOR_RESTO_SST: TFloatField
      FieldName = 'VALOR_RESTO_SST'
    end
  end
  object s_cliente: TSQLDataSet
    CommandText = 
      'select ima.BAIRRO, ima.CIDADE, ima.CEP, ima.UF, ima.NR, '#13#10'      ' +
      '    cep.rua, '#13#10'          pro.NOME_PROPRIETARIO, '#13#10'          inc.' +
      'NOME_INQUILINO, inc.CPF_CPJ, inc.RG_IE  '#13#10'  from IMOVEL_ALUGUEL ' +
      'ima '#13#10'  left outer join CEP cep on cep.COD_CEP=ima.COD_ENDERECO ' +
      #13#10'  left outer join PROPRIETARIOS pro on pro.COD_PROPRIETARIO = ' +
      'ima.COD_PROPRIETARIO '#13#10'  left outer join INQUILINOS inc on inc.C' +
      'OD_INQUILINO = ima.COD_INQUILINO '#13#10' where COD_IMALU = :Pcod'
    MaxBlobSize = -1
    Params = <
      item
        DataType = ftInteger
        Name = 'Pcod'
        ParamType = ptInput
      end>
    SQLConnection = DM.scSge
    Left = 307
    Top = 124
    object s_clienteBAIRRO: TStringField
      FieldName = 'BAIRRO'
      Size = 80
    end
    object s_clienteCIDADE: TStringField
      FieldName = 'CIDADE'
      Size = 80
    end
    object s_clienteCEP: TStringField
      FieldName = 'CEP'
      Size = 10
    end
    object s_clienteUF: TStringField
      FieldName = 'UF'
      Size = 2
    end
    object s_clienteRUA: TStringField
      FieldName = 'RUA'
      Size = 50
    end
    object s_clienteNOME_PROPRIETARIO: TStringField
      FieldName = 'NOME_PROPRIETARIO'
      Size = 60
    end
    object s_clienteNOME_INQUILINO: TStringField
      FieldName = 'NOME_INQUILINO'
      Size = 60
    end
    object s_clienteCPF_CPJ: TStringField
      FieldName = 'CPF_CPJ'
    end
    object s_clienteRG_IE: TStringField
      FieldName = 'RG_IE'
    end
    object s_clienteNR: TStringField
      FieldName = 'NR'
      Size = 5
    end
  end
  object s_empresa: TSQLDataSet
    CommandText = 'select * from EMPRESA'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = DM.scSge
    Left = 240
    Top = 123
    object s_empresaRAZAO_EMPRESA: TStringField
      FieldName = 'RAZAO_EMPRESA'
      Size = 50
    end
    object s_empresaNCRECI: TStringField
      FieldName = 'NCRECI'
      Size = 15
    end
    object s_empresaENDERECO: TStringField
      FieldName = 'ENDERECO'
      Size = 40
    end
    object s_empresaNR: TStringField
      FieldName = 'NR'
      Size = 10
    end
    object s_empresaCOMPLEMENTO: TStringField
      FieldName = 'COMPLEMENTO'
      Size = 30
    end
    object s_empresaBAIRRO: TStringField
      FieldName = 'BAIRRO'
      Size = 30
    end
    object s_empresaCIDADE: TStringField
      FieldName = 'CIDADE'
      Size = 30
    end
    object s_empresaESTADO: TStringField
      FieldName = 'ESTADO'
      Size = 2
    end
    object s_empresaCEP: TStringField
      FieldName = 'CEP'
      Size = 10
    end
    object s_empresaTELEFONE: TStringField
      FieldName = 'TELEFONE'
      Size = 13
    end
    object s_empresaFAX: TStringField
      FieldName = 'FAX'
      Size = 13
    end
    object s_empresaEMAIL: TStringField
      FieldName = 'EMAIL'
      Size = 80
    end
    object s_empresaROME_PAGE: TStringField
      FieldName = 'ROME_PAGE'
      Size = 80
    end
    object s_empresaLOGOTIPO: TGraphicField
      FieldName = 'LOGOTIPO'
      BlobType = ftGraphic
    end
    object s_empresaNOME_EMPRESA: TStringField
      FieldName = 'NOME_EMPRESA'
      Size = 50
    end
    object s_empresaCOD_EMPRESA: TIntegerField
      FieldName = 'COD_EMPRESA'
      Required = True
    end
    object s_empresaCELULAR: TStringField
      FieldName = 'CELULAR'
      Size = 13
    end
  end
  object SQLDataSet1: TSQLDataSet
    MaxBlobSize = -1
    Params = <>
    SQLConnection = DM.scSge
    Left = 344
    Top = 123
  end
  object p_cr: TDataSetProvider
    DataSet = s_cr
    UpdateMode = upWhereKeyOnly
    Left = 272
    Top = 179
  end
  object ds_cr: TClientDataSet
    Aggregates = <>
    Params = <
      item
        DataType = ftInteger
        Name = 'id_venda'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'dp'
        ParamType = ptInput
      end>
    ProviderName = 'p_cr'
    Left = 304
    Top = 179
    object ds_crCODRECEBIMENTO: TIntegerField
      FieldName = 'CODRECEBIMENTO'
      Required = True
    end
    object ds_crTITULO: TStringField
      FieldName = 'TITULO'
      Required = True
      Size = 18
    end
    object ds_crEMISSAO: TDateField
      FieldName = 'EMISSAO'
    end
    object ds_crCODCLIENTE: TIntegerField
      FieldName = 'CODCLIENTE'
      Required = True
    end
    object ds_crDATAVENCIMENTO: TDateField
      FieldName = 'DATAVENCIMENTO'
    end
    object ds_crDATARECEBIMENTO: TDateField
      FieldName = 'DATARECEBIMENTO'
    end
    object ds_crCAIXA: TSmallintField
      FieldName = 'CAIXA'
    end
    object ds_crCONTADEBITO: TIntegerField
      FieldName = 'CONTADEBITO'
    end
    object ds_crCONTACREDITO: TIntegerField
      FieldName = 'CONTACREDITO'
    end
    object ds_crSTATUS: TStringField
      FieldName = 'STATUS'
      Required = True
      FixedChar = True
      Size = 2
    end
    object ds_crVIA: TStringField
      FieldName = 'VIA'
      Required = True
      FixedChar = True
      Size = 4
    end
    object ds_crFORMARECEBIMENTO: TStringField
      FieldName = 'FORMARECEBIMENTO'
      Required = True
      FixedChar = True
      Size = 1
    end
    object ds_crDATABAIXA: TDateField
      FieldName = 'DATABAIXA'
    end
    object ds_crHISTORICO: TStringField
      FieldName = 'HISTORICO'
      Size = 150
    end
    object ds_crCODVENDA: TIntegerField
      FieldName = 'CODVENDA'
    end
    object ds_crCODALMOXARIFADO: TSmallintField
      FieldName = 'CODALMOXARIFADO'
    end
    object ds_crCODVENDEDOR: TSmallintField
      FieldName = 'CODVENDEDOR'
    end
    object ds_crCODUSUARIO: TSmallintField
      FieldName = 'CODUSUARIO'
    end
    object ds_crN_DOCUMENTO: TStringField
      FieldName = 'N_DOCUMENTO'
    end
    object ds_crDATASISTEMA: TSQLTimeStampField
      FieldName = 'DATASISTEMA'
    end
    object ds_crVALORRECEBIDO: TFloatField
      FieldName = 'VALORRECEBIDO'
    end
    object ds_crJUROS: TFloatField
      FieldName = 'JUROS'
    end
    object ds_crDESCONTO: TFloatField
      FieldName = 'DESCONTO'
    end
    object ds_crPERDA: TFloatField
      FieldName = 'PERDA'
    end
    object ds_crTROCA: TFloatField
      FieldName = 'TROCA'
    end
    object ds_crFUNRURAL: TFloatField
      FieldName = 'FUNRURAL'
    end
    object ds_crVALOR_PRIM_VIA: TFloatField
      FieldName = 'VALOR_PRIM_VIA'
    end
    object ds_crVALOR_RESTO: TFloatField
      FieldName = 'VALOR_RESTO'
    end
    object ds_crVALORTITULO: TFloatField
      FieldName = 'VALORTITULO'
    end
    object ds_crOUTRO_CREDITO: TFloatField
      FieldName = 'OUTRO_CREDITO'
    end
    object ds_crOUTRO_DEBITO: TFloatField
      FieldName = 'OUTRO_DEBITO'
    end
    object ds_crPARCELAS: TIntegerField
      FieldName = 'PARCELAS'
    end
    object ds_crDUP_REC_NF: TStringField
      FieldName = 'DUP_REC_NF'
      Size = 15
    end
    object ds_crNF: TIntegerField
      FieldName = 'NF'
    end
    object ds_crDP: TIntegerField
      FieldName = 'DP'
    end
    object ds_crBL: TIntegerField
      FieldName = 'BL'
    end
    object ds_crCODORIGEM: TIntegerField
      FieldName = 'CODORIGEM'
    end
    object ds_crCODIGO_DE_BARRAS: TStringField
      FieldName = 'CODIGO_DE_BARRAS'
      Size = 54
    end
    object ds_crIMAGE_COD_BARRAS: TGraphicField
      FieldName = 'IMAGE_COD_BARRAS'
      BlobType = ftGraphic
    end
    object ds_crDV: TStringField
      FieldName = 'DV'
      FixedChar = True
      Size = 2
    end
    object ds_crNOMEARQUIVORETORNO: TStringField
      FieldName = 'NOMEARQUIVORETORNO'
      Size = 80
    end
    object ds_crDATACONSOLIDA: TDateField
      FieldName = 'DATACONSOLIDA'
    end
    object ds_crSELECIONOU: TStringField
      FieldName = 'SELECIONOU'
      FixedChar = True
      Size = 1
    end
    object ds_crDESCONTADO: TStringField
      FieldName = 'DESCONTADO'
      FixedChar = True
      Size = 1
    end
    object ds_crSITUACAO: TStringField
      FieldName = 'SITUACAO'
      FixedChar = True
      Size = 1
    end
    object ds_crCONTA: TStringField
      FieldName = 'CONTA'
      FixedChar = True
      Size = 10
    end
    object ds_crBANCO: TStringField
      FieldName = 'BANCO'
      Size = 60
    end
    object ds_crAGENCIA: TStringField
      FieldName = 'AGENCIA'
      Size = 10
    end
    object ds_crGERARQREM: TIntegerField
      FieldName = 'GERARQREM'
    end
    object ds_crDATAGERARQREM: TDateField
      FieldName = 'DATAGERARQREM'
    end
    object ds_crSITUACAOCHEQUE: TStringField
      FieldName = 'SITUACAOCHEQUE'
      Size = 15
    end
    object ds_crVALST: TFloatField
      FieldName = 'VALST'
    end
    object ds_crVALOR_RESTO_SST: TFloatField
      FieldName = 'VALOR_RESTO_SST'
    end
  end
  object OpenDialog1: TOpenDialog
    Left = 358
    Top = 181
  end
end
